(define (max-sum a b c)
        (if (> a b)
            (if (> b c)
                (+ a b)
                (+ a c)
            )
            (if (> a c)
                (+ b a)
                (+ b c)
            )    
        )
)
(display (max-sum 1 3 18))
(display #\newline)
(display (max-sum 11 3 18))
(display #\newline)
(display (max-sum 11 13 8))
(exit)